home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / mmedia / system / ap2 / scripts / vp6____3.p2s < prev    next >
Encoding:
Text File  |  1994-05-05  |  2.8 KB  |  121 lines
  1. ###########################################################################
  2. #
  3. # Description:  PLAY LASERF24.AVI.  During Play, Perform Position and
  4. # Size tests on Window.  Wait for Play to finish, then Close Video Player.
  5. #
  6. ###########################################################################
  7.  
  8. ############################################
  9. #
  10. #   OPEN THE DIGITAL VIDEO PLAYER
  11. #   WAIT FOR SUCCESSFUL OPEN
  12. #
  13. ############################################
  14.  
  15. OPEN DigitalVideo ALIAS VID SHAREABLE NOTIFY
  16. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_OPEN #1
  17. @WAIT_NOTIFY 1 45000
  18.  
  19. ############################################
  20. #
  21. #   LOAD LASERF24.AVI FILE
  22. #   WAIT FOR SUCCESSFUL LOAD
  23. #
  24. ############################################
  25.  
  26. load VID ?AP2PATH?LASERF24.AVI notify
  27. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_LOAD #2
  28. @WAIT_NOTIFY 2 30000
  29.  
  30. ############################################
  31. #
  32. #   PLAY LASERF24.AVI FILE
  33. #   WAIT FOR SUCCESSFUL PLAY
  34. #
  35. ############################################
  36.  
  37. play VID from 0 notify
  38. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PLAY #3
  39.  
  40. @PAUSE 2000
  41.  
  42. ############################################
  43. #
  44. #   MOVE WINDOW
  45. #   WAIT FOR SUCCESSFUL PUT
  46. #
  47. ############################################
  48.  
  49. PUT VID WINDOW AT 300 200 400 300 MOVE NOTIFY
  50. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PUT #4
  51. @WAIT_NOTIFY 4 90000
  52. @PAUSE 2000
  53.  
  54. ############################################
  55. #
  56. #   SIZE WINDOW
  57. #   WAIT FOR SUCCESSFUL PUT
  58. #
  59. ############################################
  60.  
  61. PUT VID WINDOW AT 0 0 640 480 SIZE NOTIFY
  62. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PUT #5
  63. @WAIT_NOTIFY 5 90000
  64. @PAUSE 2000
  65.  
  66. ############################################
  67. #
  68. #   SIZE WINDOW
  69. #   WAIT FOR SUCCESSFUL PUT
  70. #
  71. ############################################
  72.  
  73. PUT VID WINDOW AT 0 0 320 200 SIZE NOTIFY
  74. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PUT #6
  75. @WAIT_NOTIFY 6 90000
  76. @PAUSE 2000
  77.  
  78. ############################################
  79. #
  80. #   MOVE WINDOW
  81. #   WAIT FOR SUCCESSFUL PUT
  82. #
  83. ############################################
  84.  
  85. PUT VID WINDOW AT 400 0 500 0 MOVE NOTIFY
  86. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PUT #7
  87. @WAIT_NOTIFY 7 90000
  88. @PAUSE 2000
  89.  
  90. ############################################
  91. #
  92. #   MOVE WINDOW
  93. #   WAIT FOR SUCCESSFUL PUT
  94. #
  95. ############################################
  96.  
  97. PUT VID WINDOW AT 0 100 0 200 MOVE NOTIFY
  98. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PUT #8
  99. @WAIT_NOTIFY 8 90000
  100.  
  101.  
  102. ############################################
  103. #
  104. #   WAIT FOR SUCCESSFUL PLAY
  105. #
  106. ############################################
  107.  
  108. @WAIT_NOTIFY 3 90000
  109.  
  110. ############################################
  111. #
  112. #   CLOSE THE DIGIAL VIDEO PLAYER AND
  113. #   EXPECT A SUCCESSFUL CLOSE
  114. #
  115. ############################################
  116.  
  117. CLOSE VID NOTIFY
  118. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CLOSE #9
  119. @WAIT_NOTIFY 9 30000
  120.  
  121.